inherited FCadastroLoteTransacao: TFCadastroLoteTransacao
  Left = 389
  Top = 97
  Caption = 'Lote/Transa'#231#227'o'
  OldCreateOrder = True
  PixelsPerInch = 96
  TextHeight = 16
  inherited pcCadastro: TPageControl
    inherited TsPesquisa: TTabSheet
      inherited pnPesquisa: TPanel
        object BtnEmissao: TBitBtn
          Left = 5
          Top = 5
          Width = 116
          Height = 25
          Hint = 'Relat'#243'rio Critica dos Lan'#231'amentos'
          HelpType = htKeyword
          Caption = 'Lan'#231'amentos'
          ParentShowHint = False
          ShowHint = True
          TabOrder = 3
          Glyph.Data = {
            36010000424D3601000000000000760000002800000012000000100000000100
            040000000000C000000000000000000000001000000000000000000000000000
            8000008000000080800080000000800080008080000080808000C0C0C0000000
            FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF008F0000000000
            0000080000008F7777777777777708000000F77777777777777770000000F888
            88888888888880000000F8A288888808080880000000F88FFFFFFFFFFFFF8000
            0000FFF8888888888888FF000000888FFFFFFFFFFFF788000000888F88888888
            88F788000000888FFFFFFFFFFFF788000000888F8888888888F788000000888F
            FFFFFFFFFFF788000000888F8888888888F788000000888FFFFFFFFFF7778800
            0000888FFFFFFFFFF7F888000000888FFFFFFFFFF78888000000}
        end
      end
      inherited dbgPesquisaPadra: TDBGrid
        Columns = <
          item
            Expanded = False
            FieldName = 'LOTE_NUMERO'
            Width = 54
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'LOTE_DATA'
            Title.Alignment = taCenter
            Width = 92
            Visible = True
          end
          item
            Expanded = False
            FieldName = 'LOTE_DESCRICAO'
            Width = 229
            Visible = True
          end>
      end
      inherited pnPesquisaPadrao: TPanel
        object GroupBox3: TGroupBox
          Left = 690
          Top = -1
          Width = 147
          Height = 58
          Ctl3D = False
          ParentCtl3D = False
          TabOrder = 3
          object CheckBox1: TCheckBox
            Tag = 1
            Left = 1
            Top = 8
            Width = 145
            Height = 17
            Caption = 'Com Diferen'#231'a'
            Color = clYellow
            ParentColor = False
            TabOrder = 0
            OnClick = CheckBox1Click
          end
          object CheckBox2: TCheckBox
            Tag = 1
            Left = 1
            Top = 24
            Width = 145
            Height = 17
            Caption = 'Sem Diferen'#231'a'
            Color = clLime
            ParentColor = False
            TabOrder = 1
            OnClick = CheckBox1Click
          end
          object CheckBox3: TCheckBox
            Tag = 1
            Left = 1
            Top = 40
            Width = 145
            Height = 17
            Caption = 'Atualizado'
            Color = clGradientInactiveCaption
            ParentColor = False
            TabOrder = 2
            OnClick = CheckBox1Click
          end
        end
      end
    end
    inherited TsCadastro: TTabSheet
      OnShow = TsCadastroShow
      inherited panel1: TPanel
        inherited panel2: TPanel
          inherited DBNavigator1: TDBNavigator
            Hints.Strings = ()
          end
          inherited streg: TStaticText
            Left = 568
          end
        end
        object pcAbas: TPageControl
          Left = 1
          Top = 36
          Width = 840
          Height = 385
          ActivePage = tsLote
          Align = alClient
          Font.Charset = ANSI_CHARSET
          Font.Color = clWindowText
          Font.Height = -13
          Font.Name = 'Arial'
          Font.Style = []
          MultiLine = True
          ParentFont = False
          Style = tsFlatButtons
          TabOrder = 2
          object tsLote: TTabSheet
            Caption = 'Lote'
            OnShow = tsLoteShow
            object Label1: TLabel
              Left = 8
              Top = 48
              Width = 25
              Height = 16
              Caption = 'Lote'
            end
            object Label6: TLabel
              Left = 64
              Top = 48
              Width = 58
              Height = 16
              Caption = 'Descri'#231#227'o'
            end
            object Label7: TLabel
              Left = 328
              Top = 48
              Width = 27
              Height = 16
              Caption = 'Data'
            end
            object edLote: TDBEdit
              Left = 8
              Top = 64
              Width = 49
              Height = 24
              DataField = 'LOTE_NUMERO'
              DataSource = dsCadastro
              TabOrder = 0
              OnKeyPress = edLoteKeyPress
            end
            object edDescricao: TDBEdit
              Left = 64
              Top = 64
              Width = 257
              Height = 24
              DataField = 'LOTE_DESCRICAO'
              DataSource = dsCadastro
              TabOrder = 1
            end
            object edData: TDBDateEdit
              Left = 328
              Top = 64
              Width = 97
              Height = 24
              DataField = 'LOTE_DATA'
              DataSource = dsCadastro
              NumGlyphs = 2
              TabOrder = 2
            end
            object rgSituacao: TDBRadioGroup
              Left = 448
              Top = 48
              Width = 177
              Height = 89
              Caption = ' Situa'#231#227'o '
              DataField = 'LOTE_SITUACAO'
              DataSource = dsCadastro
              Items.Strings = (
                'Sem Diferen'#231'a'
                'Com Diferen'#231'a '
                'Atualizada')
              TabOrder = 3
              Values.Strings = (
                '0'
                '1'
                '2')
            end
            object GroupBox1: TGroupBox
              Left = 8
              Top = 136
              Width = 617
              Height = 105
              Caption = ' Totais '
              TabOrder = 4
              object Label8: TLabel
                Left = 16
                Top = 24
                Width = 76
                Height = 16
                Caption = 'Transa'#231#245'es:'
                Font.Charset = ANSI_CHARSET
                Font.Color = clWindowText
                Font.Height = -13
                Font.Name = 'Arial'
                Font.Style = [fsBold]
                ParentFont = False
              end
              object Label9: TLabel
                Left = 16
                Top = 48
                Width = 52
                Height = 16
                Caption = 'Abertas:'
                Font.Charset = ANSI_CHARSET
                Font.Color = clWindowText
                Font.Height = -13
                Font.Name = 'Arial'
                Font.Style = [fsBold]
                ParentFont = False
              end
              object Label10: TLabel
                Left = 16
                Top = 72
                Width = 65
                Height = 16
                Caption = 'Fechadas:'
                Font.Charset = ANSI_CHARSET
                Font.Color = clWindowText
                Font.Height = -13
                Font.Name = 'Arial'
                Font.Style = [fsBold]
                ParentFont = False
              end
              object lbTransacoes: TLabel
                Left = 120
                Top = 24
                Width = 21
                Height = 16
                Alignment = taRightJustify
                Caption = '200'
              end
              object lbTransAbertas: TLabel
                Left = 120
                Top = 48
                Width = 21
                Height = 16
                Alignment = taRightJustify
                Caption = '120'
              end
              object lbTransFechadas: TLabel
                Left = 127
                Top = 72
                Width = 14
                Height = 16
                Alignment = taRightJustify
                Caption = '80'
              end
              object Label14: TLabel
                Left = 216
                Top = 24
                Width = 89
                Height = 16
                Caption = 'Lan'#231'amentos:'
                Font.Charset = ANSI_CHARSET
                Font.Color = clWindowText
                Font.Height = -13
                Font.Name = 'Arial'
                Font.Style = [fsBold]
                ParentFont = False
              end
              object lbTotalLancto: TLabel
                Left = 320
                Top = 24
                Width = 21
                Height = 16
                Caption = '600'
              end
              object Label16: TLabel
                Left = 424
                Top = 24
                Width = 45
                Height = 16
                Caption = 'D'#233'bito:'
                Font.Charset = ANSI_CHARSET
                Font.Color = clWindowText
                Font.Height = -13
                Font.Name = 'Arial'
                Font.Style = [fsBold]
                ParentFont = False
              end
              object lbTotalDebito: TLabel
                Left = 504
                Top = 24
                Width = 50
                Height = 16
                Alignment = taRightJustify
                Caption = '6.009,00'
              end
              object Label18: TLabel
                Left = 424
                Top = 48
                Width = 50
                Height = 16
                Caption = 'Cr'#233'dito:'
                Font.Charset = ANSI_CHARSET
                Font.Color = clWindowText
                Font.Height = -13
                Font.Name = 'Arial'
                Font.Style = [fsBold]
                ParentFont = False
              end
              object lbTotalCredito: TLabel
                Left = 504
                Top = 48
                Width = 50
                Height = 16
                Alignment = taRightJustify
                Caption = '6.009,00'
              end
              object Label20: TLabel
                Left = 424
                Top = 72
                Width = 65
                Height = 16
                Caption = 'Diferen'#231'a:'
                Font.Charset = ANSI_CHARSET
                Font.Color = clWindowText
                Font.Height = -13
                Font.Name = 'Arial'
                Font.Style = [fsBold]
                ParentFont = False
              end
              object lbTotalDiferenca: TLabel
                Left = 529
                Top = 72
                Width = 25
                Height = 16
                Alignment = taRightJustify
                Caption = '0,00'
              end
            end
          end
          object tsTransacao: TTabSheet
            Caption = 'Transa'#231#227'o'
            Font.Charset = ANSI_CHARSET
            Font.Color = clWindowText
            Font.Height = -13
            Font.Name = 'Arial'
            Font.Style = []
            ImageIndex = 1
            ParentFont = False
            OnShow = tsTransacaoShow
            object Panel8: TPanel
              Left = 4
              Top = 128
              Width = 825
              Height = 232
              Caption = 'Panel8'
              TabOrder = 0
              object Panel4: TPanel
                Left = 8
                Top = 81
                Width = 817
                Height = 113
                TabOrder = 0
                object Label2: TLabel
                  Left = 104
                  Top = 2
                  Width = 85
                  Height = 16
                  Caption = 'Conta Contabil'
                end
                object Label3: TLabel
                  Left = 528
                  Top = 1
                  Width = 94
                  Height = 16
                  Caption = 'Centro de Custo'
                end
                object Label4: TLabel
                  Left = 8
                  Top = 42
                  Width = 78
                  Height = 16
                  Caption = 'Hist'#243'rico (F8)'
                end
                object Label5: TLabel
                  Left = 632
                  Top = 66
                  Width = 30
                  Height = 16
                  Caption = 'Valor'
                end
                object lbl1: TLabel
                  Left = 8
                  Top = 2
                  Width = 91
                  Height = 16
                  Caption = 'Data Transa'#231#227'o'
                end
                object dblTransContaContabil: TDBLookupComboBox
                  Left = 104
                  Top = 18
                  Width = 418
                  Height = 24
                  DataField = 'CCON_CODIGO'
                  DataSource = dsTransacao
                  KeyField = 'CCON_CODIGO'
                  ListField = 'CCON_DESCRICAO'
                  ListSource = dsContaContabil
                  TabOrder = 1
                  OnExit = dblTransContaContabilExit
                end
                object dblTransCentroCusto: TDBLookupComboBox
                  Left = 528
                  Top = 17
                  Width = 284
                  Height = 24
                  DataField = 'CCC_CODIGO'
                  DataSource = dsTransacao
                  KeyField = 'CCC_CODIGO'
                  ListField = 'CCC_DESCRICAO'
                  ListSource = dsCentroCustoContabil
                  TabOrder = 2
                end
                object edTransHist1: TDBEdit
                  Left = 8
                  Top = 58
                  Width = 609
                  Height = 24
                  DataField = 'TRANS_HISTORICO1'
                  DataSource = dsTransacao
                  TabOrder = 3
                  OnKeyDown = edTransHist1KeyDown
                end
                object edTransHist2: TDBEdit
                  Left = 8
                  Top = 80
                  Width = 609
                  Height = 24
                  DataField = 'TRANS_HISTORICO2'
                  DataSource = dsTransacao
                  TabOrder = 4
                  OnKeyDown = edTransHist2KeyDown
                end
                object edTransValor: TRxDBCalcEdit
                  Left = 632
                  Top = 82
                  Width = 121
                  Height = 21
                  DataField = 'TRANS_VALOR'
                  DataSource = dsTransacao
                  DisplayFormat = '#,##0.00'
                  NumGlyphs = 2
                  TabOrder = 5
                end
                object edDataTrans: TDBDateEdit
                  Left = 8
                  Top = 18
                  Width = 92
                  Height = 24
                  DataField = 'TRANS_DATA'
                  DataSource = dsTransacao
                  NumGlyphs = 2
                  TabOrder = 0
                end
              end
              object dbrDebCred: TDBRadioGroup
                Left = 10
                Top = 36
                Width = 175
                Height = 40
                Columns = 2
                DataField = 'TRANS_DEB_CRE'
                DataSource = dsTransacao
                Items.Strings = (
                  'Debito'
                  'Credito')
                TabOrder = 1
                Values.Strings = (
                  'D'
                  'C')
              end
              object dbrSituacao: TDBRadioGroup
                Left = 192
                Top = 37
                Width = 161
                Height = 40
                Caption = ' Situa'#231#227'o '
                Columns = 2
                DataField = 'TRANS_SITUACAO'
                DataSource = dsTransacao
                Items.Strings = (
                  'Aberto '
                  'Fechado')
                ReadOnly = True
                TabOrder = 2
                Values.Strings = (
                  'A'
                  'F')
              end
              object GroupBox2: TGroupBox
                Left = 632
                Top = 37
                Width = 131
                Height = 40
                Caption = ' Diferen'#231'a '
                TabOrder = 3
                object lbDiferenca: TLabel
                  Left = 92
                  Top = 16
                  Width = 25
                  Height = 16
                  Alignment = taRightJustify
                  Caption = '0,00'
                  Color = clBtnFace
                  Font.Charset = ANSI_CHARSET
                  Font.Color = clRed
                  Font.Height = -13
                  Font.Name = 'Arial'
                  Font.Style = []
                  ParentColor = False
                  ParentFont = False
                end
              end
              object Panel9: TPanel
                Left = 1
                Top = 1
                Width = 823
                Height = 33
                Align = alTop
                TabOrder = 4
                object btnTransIncluir: TBitBtn
                  Tag = 10
                  Left = 11
                  Top = 5
                  Width = 80
                  Height = 23
                  Caption = '&Incluir'
                  TabOrder = 0
                  OnClick = btnTransIncluirClick
                  Glyph.Data = {
                    76010000424D7601000000000000760000002800000020000000100000000100
                    04000000000000010000130B0000130B00001000000000000000000000000000
                    800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
                    FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF0033333333B333
                    333B33FF33337F3333F73BB3777BB7777BB3377FFFF77FFFF77333B000000000
                    0B3333777777777777333330FFFFFFFF07333337F33333337F333330FFFFFFFF
                    07333337F3FF3FFF7F333330F00F000F07333337F77377737F333330FFFFFFFF
                    07333FF7F3FFFF3F7FFFBBB0F0000F0F0BB37777F7777373777F3BB0FFFFFFFF
                    0BBB3777F3FF3FFF77773330F00F000003333337F773777773333330FFFF0FF0
                    33333337F3FF7F37F3333330F08F0F0B33333337F7737F77FF333330FFFF003B
                    B3333337FFFF77377FF333B000000333BB33337777777F3377FF3BB3333BB333
                    3BB33773333773333773B333333B3333333B7333333733333337}
                  NumGlyphs = 2
                end
                object btnTransEditar: TBitBtn
                  Tag = 10
                  Left = 98
                  Top = 5
                  Width = 80
                  Height = 23
                  Caption = '&Editar'
                  TabOrder = 1
                  OnClick = btnTransEditarClick
                  Glyph.Data = {
                    76010000424D7601000000000000760000002800000020000000100000000100
                    04000000000000010000120B0000120B00001000000000000000000000000000
                    800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
                    FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333000000
                    000033333377777777773333330FFFFFFFF03FF3FF7FF33F3FF700300000FF0F
                    00F077F777773F737737E00BFBFB0FFFFFF07773333F7F3333F7E0BFBF000FFF
                    F0F077F3337773F3F737E0FBFBFBF0F00FF077F3333FF7F77F37E0BFBF00000B
                    0FF077F3337777737337E0FBFBFBFBF0FFF077F33FFFFFF73337E0BF0000000F
                    FFF077FF777777733FF7000BFB00B0FF00F07773FF77373377373330000B0FFF
                    FFF03337777373333FF7333330B0FFFF00003333373733FF777733330B0FF00F
                    0FF03333737F37737F373330B00FFFFF0F033337F77F33337F733309030FFFFF
                    00333377737FFFFF773333303300000003333337337777777333}
                  NumGlyphs = 2
                end
                object btnTransExcluir: TBitBtn
                  Tag = 10
                  Left = 185
                  Top = 5
                  Width = 80
                  Height = 23
                  Caption = '&Excluir'
                  TabOrder = 2
                  OnClick = btnTransExcluirClick
                  Glyph.Data = {
                    B2050000424DB205000000000000360400002800000012000000130000000100
                    0800000000007C010000C30E0000C30E00000001000000000000000000007B00
                    0000BD000000FF0000007B7B000000FF0000FFFF000000315A0008427300084A
                    730000007B007B007B00084A7B0008527B0021527B00007B7B007B7B7B00004A
                    840008528400105284002963840008528C00085A8C00185A8C0018638C002963
                    8C0008529400185A9400296B9400316B94002973940031739400085A9C001863
                    9C0018739C0029739C0031739C0031849C00005AA5002173A5003973A500297B
                    A500186BAD00106BB500317BB5002984B5004A8CB500086BBD000073BD001073
                    BD001873BD00217BBD004284BD00318CBD004A8CBD005294BD005A9CBD00BDBD
                    BD001073C600007BC600217BC600428CC6004A8CC6005A9CC6000084CE000884
                    CE00398CCE005A9CCE00639CCE001884D6002184D600088CD600108CD6004294
                    D600399CD6004A9CD600529CD6005A9CD6005AA5D60063ADD6001884DE002184
                    DE00188CDE001094DE001894DE003194DE00299CDE004AA5DE005AA5DE004AB5
                    DE00189CE700219CE700429CE7005AA5E7005AADE70063ADE7006BB5E70021A5
                    EF0029A5EF0031A5EF0063B5EF006BBDEF0029ADF70031ADF7006BBDF7000000
                    FF00FF00FF0031B5FF0039B5FF0042B5FF0039BDFF0042BDFF0042C6FF004AC6
                    FF006BC6FF004ACEFF0052CEFF0052D6FF005ADEFF0063E7FF0000FFFF00FFFF
                    FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
                    FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
                    FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
                    FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
                    FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
                    FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
                    FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
                    FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
                    FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
                    FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
                    FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
                    FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
                    FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
                    FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
                    FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
                    FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
                    FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00393939393939
                    3939393939393939393939690000396939393939393939393939393939396939
                    0000396969393910101010101010101010693939000039696969000000000000
                    0000000069693939000039396969007879797978797979696939393900003939
                    3969697903030303030379691039393900003939396969697978797979786969
                    1039393900003939393969696903030369696900103939390000393939390069
                    6969797869697900103939390000393939390079036969696903790010393939
                    0000393939390079796969696978790010393939000039393939007903696969
                    6900000010393939000039393939007869697900696979001039393900003939
                    3939006969697900696969693939393900003939396969697978790079003969
                    6939393900003969696969000000000000393939696939390000396969693939
                    3939393939393939393969390000393939393939393939393939393939393969
                    00003939393939393939393939393939393939390000}
                end
                object DBNavigator3: TDBNavigator
                  Tag = 11
                  Left = 728
                  Top = 5
                  Width = 80
                  Height = 23
                  DataSource = dsTransacao
                  VisibleButtons = [nbFirst, nbPrior, nbNext, nbLast]
                  TabOrder = 3
                end
                object stregTransacao: TStaticText
                  Left = 603
                  Top = 9
                  Width = 117
                  Height = 20
                  Alignment = taRightJustify
                  Caption = ' Reg: 10000/10000 '
                  TabOrder = 4
                end
              end
              object Panel10: TPanel
                Left = 1
                Top = 198
                Width = 823
                Height = 33
                Align = alBottom
                TabOrder = 5
                TabStop = True
                object btnTransSalvar: TBitBtn
                  Tag = 6
                  Left = 649
                  Top = 5
                  Width = 77
                  Height = 23
                  Caption = '&Salvar'
                  TabOrder = 0
                  OnClick = btnTransSalvarClick
                  Glyph.Data = {
                    76010000424D7601000000000000760000002800000020000000100000000100
                    04000000000000010000130B0000130B00001000000000000000000000000000
                    800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
                    FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333330070
                    7700333333337777777733333333008088003333333377F73377333333330088
                    88003333333377FFFF7733333333000000003FFFFFFF77777777000000000000
                    000077777777777777770FFFFFFF0FFFFFF07F3333337F3333370FFFFFFF0FFF
                    FFF07F3FF3FF7FFFFFF70F00F0080CCC9CC07F773773777777770FFFFFFFF039
                    99337F3FFFF3F7F777F30F0000F0F09999937F7777373777777F0FFFFFFFF999
                    99997F3FF3FFF77777770F00F000003999337F773777773777F30FFFF0FF0339
                    99337F3FF7F3733777F30F08F0F0337999337F7737F73F7777330FFFF0039999
                    93337FFFF7737777733300000033333333337777773333333333}
                  NumGlyphs = 2
                end
                object btnTransCancelar: TBitBtn
                  Tag = 5
                  Left = 729
                  Top = 5
                  Width = 77
                  Height = 23
                  Caption = '&Cancelar'
                  TabOrder = 1
                  OnClick = btnTransCancelarClick
                  Glyph.Data = {
                    76010000424D7601000000000000760000002800000020000000100000000100
                    0400000000000001000000000000000000001000000000000000000000000000
                    8000008000000080800080000000800080008080000080808000C0C0C0000000
                    FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
                    3333333333FFFFF3333333333999993333333333F77777FFF333333999999999
                    33333337777FF377FF3333993370739993333377FF373F377FF3399993000339
                    993337777F777F3377F3393999707333993337F77737333337FF993399933333
                    399377F3777FF333377F993339903333399377F33737FF33377F993333707333
                    399377F333377FF3377F993333101933399377F333777FFF377F993333000993
                    399377FF3377737FF7733993330009993933373FF3777377F7F3399933000399
                    99333773FF777F777733339993707339933333773FF7FFF77333333999999999
                    3333333777333777333333333999993333333333377777333333}
                  NumGlyphs = 2
                end
                object btnConsultaItem: TBitBtn
                  Left = 6
                  Top = 5
                  Width = 174
                  Height = 23
                  Caption = 'Consulta Contra-Partida'
                  TabOrder = 2
                  TabStop = False
                  Glyph.Data = {
                    76010000424D7601000000000000760000002800000020000000100000000100
                    0400000000000001000000000000000000001000000000000000000000000000
                    8000008000000080800080000000800080008080000080808000C0C0C0000000
                    FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
                    33033333333333333F7F3333333333333000333333333333F777333333333333
                    000333333333333F777333333333333000333333333333F77733333333333300
                    033333333FFF3F777333333700073B703333333F7773F77733333307777700B3
                    333333773337777333333078F8F87033333337F3333337F33333778F8F8F8773
                    333337333333373F333307F8F8F8F70333337F33FFFFF37F3333078999998703
                    33337F377777337F333307F8F8F8F703333373F3333333733333778F8F8F8773
                    333337F3333337F333333078F8F870333333373FF333F7333333330777770333
                    333333773FF77333333333370007333333333333777333333333}
                  NumGlyphs = 2
                end
              end
            end
            object dbgTrans: TDBGrid
              Left = 4
              Top = 8
              Width = 825
              Height = 113
              DataSource = dsTransacao
              ParentShowHint = False
              ShowHint = True
              TabOrder = 1
              TitleFont.Charset = ANSI_CHARSET
              TitleFont.Color = clWindowText
              TitleFont.Height = -13
              TitleFont.Name = 'Arial'
              TitleFont.Style = []
              Columns = <
                item
                  Expanded = False
                  FieldName = 'CCON_DESCRICAO'
                  Title.Caption = 'Conta Contabil'
                  Width = 340
                  Visible = True
                end
                item
                  Expanded = False
                  FieldName = 'TRANS_HISTORICO1'
                  Title.Caption = 'Hist'#243'rico'
                  Width = 340
                  Visible = True
                end
                item
                  Expanded = False
                  FieldName = 'TRANS_VALOR'
                  Title.Alignment = taCenter
                  Title.Caption = 'Valor'
                  Width = 101
                  Visible = True
                end>
            end
          end
          object tsContraPartida: TTabSheet
            Caption = 'Contra-Partida'
            ImageIndex = 2
            object dbgItens: TDBGrid
              Left = 4
              Top = 8
              Width = 825
              Height = 113
              DataSource = dsTransItem
              TabOrder = 0
              TitleFont.Charset = ANSI_CHARSET
              TitleFont.Color = clWindowText
              TitleFont.Height = -13
              TitleFont.Name = 'Arial'
              TitleFont.Style = []
              Columns = <
                item
                  Expanded = False
                  FieldName = 'CCON_DESCRICAO'
                  Title.Caption = 'Conta Contabil'
                  Width = 340
                  Visible = True
                end
                item
                  Expanded = False
                  FieldName = 'TRANS_HISTORICO1'
                  Title.Caption = 'Hist'#243'rico'
                  Width = 340
                  Visible = True
                end
                item
                  Expanded = False
                  FieldName = 'TRANS_VALOR'
                  Title.Alignment = taCenter
                  Title.Caption = 'Valor'
                  Width = 101
                  Visible = True
                end>
            end
            object Panel5: TPanel
              Left = 4
              Top = 128
              Width = 825
              Height = 232
              Caption = 'Panel8'
              TabOrder = 1
              object Panel6: TPanel
                Left = 8
                Top = 81
                Width = 817
                Height = 113
                TabOrder = 0
                object lbContaContabil: TLabel
                  Left = 104
                  Top = 2
                  Width = 85
                  Height = 16
                  Caption = 'Conta Contabil'
                end
                object Label23: TLabel
                  Left = 528
                  Top = 1
                  Width = 94
                  Height = 16
                  Caption = 'Centro de Custo'
                end
                object Label24: TLabel
                  Left = 8
                  Top = 42
                  Width = 78
                  Height = 16
                  Caption = 'Hist'#243'rico (F8)'
                end
                object Label25: TLabel
                  Left = 632
                  Top = 66
                  Width = 30
                  Height = 16
                  Caption = 'Valor'
                end
                object lbl2: TLabel
                  Left = 8
                  Top = 2
                  Width = 91
                  Height = 16
                  Caption = 'Data Transa'#231#227'o'
                end
                object dblTransItemContaContabil: TDBLookupComboBox
                  Left = 104
                  Top = 18
                  Width = 418
                  Height = 24
                  DataField = 'CCON_CODIGO'
                  DataSource = dsTransItem
                  KeyField = 'CCON_CODIGO'
                  ListField = 'CCON_DESCRICAO'
                  ListSource = dsContaContabil
                  TabOrder = 1
                  OnExit = dblTransItemContaContabilExit
                end
                object dblTransItemCentroCusto: TDBLookupComboBox
                  Left = 528
                  Top = 17
                  Width = 284
                  Height = 24
                  DataField = 'CCC_CODIGO'
                  DataSource = dsTransItem
                  KeyField = 'CCC_CODIGO'
                  ListField = 'CCC_DESCRICAO'
                  ListSource = dsCentroCustoContabil
                  TabOrder = 2
                end
                object edTransItemHist1: TDBEdit
                  Left = 8
                  Top = 58
                  Width = 609
                  Height = 24
                  DataField = 'TRANS_HISTORICO1'
                  DataSource = dsTransItem
                  TabOrder = 3
                  OnKeyDown = edTransItemHist1KeyDown
                end
                object edTransItemHist2: TDBEdit
                  Left = 8
                  Top = 80
                  Width = 609
                  Height = 24
                  DataField = 'TRANS_HISTORICO2'
                  DataSource = dsTransItem
                  TabOrder = 4
                  OnKeyDown = edTransItemHist2KeyDown
                end
                object edTransItemValor: TRxDBCalcEdit
                  Left = 632
                  Top = 82
                  Width = 121
                  Height = 21
                  DataField = 'TRANS_VALOR'
                  DataSource = dsTransItem
                  DisplayFormat = '#,##0.00'
                  NumGlyphs = 2
                  TabOrder = 5
                end
                object DBDateEdit1: TDBDateEdit
                  Left = 8
                  Top = 18
                  Width = 92
                  Height = 24
                  DataField = 'TRANS_DATA'
                  DataSource = dsTransItem
                  ReadOnly = True
                  NumGlyphs = 2
                  TabOrder = 0
                end
              end
              object DBRadioGroup4: TDBRadioGroup
                Left = 10
                Top = 36
                Width = 175
                Height = 40
                Columns = 2
                DataField = 'TRANS_DEB_CRE'
                DataSource = dsTransItem
                Items.Strings = (
                  'Debito'
                  'Credito')
                ReadOnly = True
                TabOrder = 1
                Values.Strings = (
                  'D'
                  'C')
              end
              object Panel7: TPanel
                Left = 1
                Top = 1
                Width = 823
                Height = 33
                Align = alTop
                TabOrder = 2
                object btnItemIncluir: TBitBtn
                  Tag = 10
                  Left = 11
                  Top = 5
                  Width = 80
                  Height = 23
                  Caption = 'Incluir'
                  TabOrder = 0
                  OnClick = btnItemIncluirClick
                  Glyph.Data = {
                    76010000424D7601000000000000760000002800000020000000100000000100
                    04000000000000010000130B0000130B00001000000000000000000000000000
                    800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
                    FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF0033333333B333
                    333B33FF33337F3333F73BB3777BB7777BB3377FFFF77FFFF77333B000000000
                    0B3333777777777777333330FFFFFFFF07333337F33333337F333330FFFFFFFF
                    07333337F3FF3FFF7F333330F00F000F07333337F77377737F333330FFFFFFFF
                    07333FF7F3FFFF3F7FFFBBB0F0000F0F0BB37777F7777373777F3BB0FFFFFFFF
                    0BBB3777F3FF3FFF77773330F00F000003333337F773777773333330FFFF0FF0
                    33333337F3FF7F37F3333330F08F0F0B33333337F7737F77FF333330FFFF003B
                    B3333337FFFF77377FF333B000000333BB33337777777F3377FF3BB3333BB333
                    3BB33773333773333773B333333B3333333B7333333733333337}
                  NumGlyphs = 2
                end
                object btnItemEditar: TBitBtn
                  Tag = 10
                  Left = 98
                  Top = 5
                  Width = 80
                  Height = 23
                  Caption = '&Editar'
                  TabOrder = 1
                  OnClick = btnItemEditarClick
                  Glyph.Data = {
                    76010000424D7601000000000000760000002800000020000000100000000100
                    04000000000000010000120B0000120B00001000000000000000000000000000
                    800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
                    FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333000000
                    000033333377777777773333330FFFFFFFF03FF3FF7FF33F3FF700300000FF0F
                    00F077F777773F737737E00BFBFB0FFFFFF07773333F7F3333F7E0BFBF000FFF
                    F0F077F3337773F3F737E0FBFBFBF0F00FF077F3333FF7F77F37E0BFBF00000B
                    0FF077F3337777737337E0FBFBFBFBF0FFF077F33FFFFFF73337E0BF0000000F
                    FFF077FF777777733FF7000BFB00B0FF00F07773FF77373377373330000B0FFF
                    FFF03337777373333FF7333330B0FFFF00003333373733FF777733330B0FF00F
                    0FF03333737F37737F373330B00FFFFF0F033337F77F33337F733309030FFFFF
                    00333377737FFFFF773333303300000003333337337777777333}
                  NumGlyphs = 2
                end
                object btnItemExcluir: TBitBtn
                  Tag = 10
                  Left = 185
                  Top = 5
                  Width = 80
                  Height = 23
                  Caption = '&Excluir'
                  TabOrder = 2
                  OnClick = btnItemExcluirClick
                  Glyph.Data = {
                    B2050000424DB205000000000000360400002800000012000000130000000100
                    0800000000007C010000C30E0000C30E00000001000000000000000000007B00
                    0000BD000000FF0000007B7B000000FF0000FFFF000000315A0008427300084A
                    730000007B007B007B00084A7B0008527B0021527B00007B7B007B7B7B00004A
                    840008528400105284002963840008528C00085A8C00185A8C0018638C002963
                    8C0008529400185A9400296B9400316B94002973940031739400085A9C001863
                    9C0018739C0029739C0031739C0031849C00005AA5002173A5003973A500297B
                    A500186BAD00106BB500317BB5002984B5004A8CB500086BBD000073BD001073
                    BD001873BD00217BBD004284BD00318CBD004A8CBD005294BD005A9CBD00BDBD
                    BD001073C600007BC600217BC600428CC6004A8CC6005A9CC6000084CE000884
                    CE00398CCE005A9CCE00639CCE001884D6002184D600088CD600108CD6004294
                    D600399CD6004A9CD600529CD6005A9CD6005AA5D60063ADD6001884DE002184
                    DE00188CDE001094DE001894DE003194DE00299CDE004AA5DE005AA5DE004AB5
                    DE00189CE700219CE700429CE7005AA5E7005AADE70063ADE7006BB5E70021A5
                    EF0029A5EF0031A5EF0063B5EF006BBDEF0029ADF70031ADF7006BBDF7000000
                    FF00FF00FF0031B5FF0039B5FF0042B5FF0039BDFF0042BDFF0042C6FF004AC6
                    FF006BC6FF004ACEFF0052CEFF0052D6FF005ADEFF0063E7FF0000FFFF00FFFF
                    FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
                    FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
                    FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
                    FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
                    FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
                    FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
                    FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
                    FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
                    FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
                    FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
                    FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
                    FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
                    FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
                    FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
                    FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
                    FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFF
                    FF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00FFFFFF00393939393939
                    3939393939393939393939690000396939393939393939393939393939396939
                    0000396969393910101010101010101010693939000039696969000000000000
                    0000000069693939000039396969007879797978797979696939393900003939
                    3969697903030303030379691039393900003939396969697978797979786969
                    1039393900003939393969696903030369696900103939390000393939390069
                    6969797869697900103939390000393939390079036969696903790010393939
                    0000393939390079796969696978790010393939000039393939007903696969
                    6900000010393939000039393939007869697900696979001039393900003939
                    3939006969697900696969693939393900003939396969697978790079003969
                    6939393900003969696969000000000000393939696939390000396969693939
                    3939393939393939393969390000393939393939393939393939393939393969
                    00003939393939393939393939393939393939390000}
                end
                object DBNavigator2: TDBNavigator
                  Tag = 11
                  Left = 728
                  Top = 5
                  Width = 80
                  Height = 23
                  DataSource = dsTransItem
                  VisibleButtons = [nbFirst, nbPrior, nbNext, nbLast]
                  TabOrder = 3
                end
                object stregContraPartida: TStaticText
                  Left = 603
                  Top = 9
                  Width = 117
                  Height = 20
                  Alignment = taRightJustify
                  Caption = ' Reg: 10000/10000 '
                  TabOrder = 4
                end
              end
              object Panel11: TPanel
                Left = 1
                Top = 198
                Width = 823
                Height = 33
                Align = alBottom
                TabOrder = 3
                TabStop = True
                object btnItemSalvar: TBitBtn
                  Tag = 6
                  Left = 649
                  Top = 5
                  Width = 77
                  Height = 23
                  Caption = '&Salvar'
                  TabOrder = 0
                  OnClick = btnItemSalvarClick
                  Glyph.Data = {
                    76010000424D7601000000000000760000002800000020000000100000000100
                    04000000000000010000130B0000130B00001000000000000000000000000000
                    800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
                    FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333330070
                    7700333333337777777733333333008088003333333377F73377333333330088
                    88003333333377FFFF7733333333000000003FFFFFFF77777777000000000000
                    000077777777777777770FFFFFFF0FFFFFF07F3333337F3333370FFFFFFF0FFF
                    FFF07F3FF3FF7FFFFFF70F00F0080CCC9CC07F773773777777770FFFFFFFF039
                    99337F3FFFF3F7F777F30F0000F0F09999937F7777373777777F0FFFFFFFF999
                    99997F3FF3FFF77777770F00F000003999337F773777773777F30FFFF0FF0339
                    99337F3FF7F3733777F30F08F0F0337999337F7737F73F7777330FFFF0039999
                    93337FFFF7737777733300000033333333337777773333333333}
                  NumGlyphs = 2
                end
                object btnItemCancelar: TBitBtn
                  Tag = 5
                  Left = 729
                  Top = 5
                  Width = 77
                  Height = 23
                  Caption = '&Cancelar'
                  TabOrder = 1
                  OnClick = btnItemCancelarClick
                  Glyph.Data = {
                    76010000424D7601000000000000760000002800000020000000100000000100
                    0400000000000001000000000000000000001000000000000000000000000000
                    8000008000000080800080000000800080008080000080808000C0C0C0000000
                    FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
                    3333333333FFFFF3333333333999993333333333F77777FFF333333999999999
                    33333337777FF377FF3333993370739993333377FF373F377FF3399993000339
                    993337777F777F3377F3393999707333993337F77737333337FF993399933333
                    399377F3777FF333377F993339903333399377F33737FF33377F993333707333
                    399377F333377FF3377F993333101933399377F333777FFF377F993333000993
                    399377FF3377737FF7733993330009993933373FF3777377F7F3399933000399
                    99333773FF777F777733339993707339933333773FF7FFF77333333999999999
                    3333333777333777333333333999993333333333377777333333}
                  NumGlyphs = 2
                end
              end
            end
          end
        end
      end
    end
  end
  inherited PopupMenu1: TPopupMenu
    Top = 440
  end
  inherited dsCadastro: TDataSource
    Left = 376
    Top = 104
  end
  inherited QCadastro: TQuery
    SQL.Strings = (
      'SELECT '
      '  LOTE_CONTABIL.LOTE_CODIGO,'
      '  LOTE_CONTABIL.LOTE_NUMERO,'
      '  LOTE_CONTABIL.LOTE_DESCRICAO,'
      '  LOTE_CONTABIL.LOTE_DATA,'
      '  LOTE_CONTABIL.LOTE_SITUACAO,'
      '  LOTE_CONTABIL.DATAMODIFICACAO,'
      '  LOTE_CONTABIL.USUARIO,'
      '  LOTE_CONTABIL.USUARIO_CADASTRO,'
      '  LOTE_CONTABIL.USUARIO_AUTERACAO,'
      '  LOTE_CONTABIL.USUARIO_EXCLUSAO,'
      '  LOTE_CONTABIL.DATA_CADASTRO,'
      '  LOTE_CONTABIL.DATA_EXCLUSAO,'
      '  LOTE_CONTABIL.DATA_AUTERACAO,'
      '  LOTE_CONTABIL.EXCLUIDO,'
      '  LOTE_CONTABIL.USUARIO_RECUPERACAO,'
      '  LOTE_CONTABIL.DATA_RECUPERACAO,'
      '  LOTE_CONTABIL.LOTE_NATUREZA'
      'FROM'
      '  LOTE_CONTABIL')
    Left = 376
    Top = 8
  end
  inherited dspCadastro: TDataSetProvider
    Left = 376
    Top = 40
  end
  inherited cdsCadastro: TClientDataSet
    Left = 376
    Top = 72
    object cdsCadastroLOTE_CODIGO: TIntegerField
      Alignment = taCenter
      FieldName = 'LOTE_CODIGO'
    end
    object cdsCadastroLOTE_NUMERO: TStringField
      Alignment = taCenter
      DisplayLabel = 'N'#250'mero'
      FieldName = 'LOTE_NUMERO'
      FixedChar = True
      Size = 4
    end
    object cdsCadastroLOTE_DESCRICAO: TStringField
      DisplayLabel = 'Descri'#231#227'o'
      FieldName = 'LOTE_DESCRICAO'
    end
    object cdsCadastroLOTE_DATA: TDateTimeField
      Alignment = taCenter
      DisplayLabel = 'Data'
      FieldName = 'LOTE_DATA'
    end
    object cdsCadastroDATAMODIFICACAO: TDateTimeField
      FieldName = 'DATAMODIFICACAO'
    end
    object cdsCadastroUSUARIO: TStringField
      FieldName = 'USUARIO'
      Size = 10
    end
    object cdsCadastroUSUARIO_CADASTRO: TStringField
      FieldName = 'USUARIO_CADASTRO'
    end
    object cdsCadastroUSUARIO_AUTERACAO: TStringField
      FieldName = 'USUARIO_AUTERACAO'
    end
    object cdsCadastroUSUARIO_EXCLUSAO: TStringField
      FieldName = 'USUARIO_EXCLUSAO'
    end
    object cdsCadastroDATA_CADASTRO: TDateTimeField
      FieldName = 'DATA_CADASTRO'
    end
    object cdsCadastroDATA_EXCLUSAO: TDateTimeField
      FieldName = 'DATA_EXCLUSAO'
    end
    object cdsCadastroDATA_AUTERACAO: TDateTimeField
      FieldName = 'DATA_AUTERACAO'
    end
    object cdsCadastroEXCLUIDO: TStringField
      FieldName = 'EXCLUIDO'
      FixedChar = True
      Size = 1
    end
    object cdsCadastroUSUARIO_RECUPERACAO: TStringField
      FieldName = 'USUARIO_RECUPERACAO'
    end
    object cdsCadastroDATA_RECUPERACAO: TDateTimeField
      FieldName = 'DATA_RECUPERACAO'
    end
    object cdsCadastroLOTE_SITUACAO: TIntegerField
      FieldName = 'LOTE_SITUACAO'
    end
    object cdsCadastroLOTE_NATUREZA: TStringField
      FieldName = 'LOTE_NATUREZA'
      FixedChar = True
      Size = 2
    end
  end
  inherited dsCamposPesquisa: TDataSource
    Left = 336
    Top = 368
  end
  inherited OpenDialog1: TOpenDialog
    Left = 64
    Top = 352
  end
  object QTransacao: TQuery
    DatabaseName = 'base'
    SQL.Strings = (
      'SELECT  TRANSACAO_CONTABIL.TRANS_CODIGO'
      '       ,TRANSACAO_CONTABIL.LOTE_CODIGO'
      '       ,TRANSACAO_CONTABIL.TRANS_SITUACAO'
      '       ,TRANSACAO_CONTABIL.TRANS_DEB_CRE'
      '       ,TRANSACAO_CONTABIL.CCON_CODIGO'
      '       ,TRANSACAO_CONTABIL.CCC_CODIGO'
      '       ,TRANSACAO_CONTABIL.DATAMODIFICACAO'
      '       ,TRANSACAO_CONTABIL.USUARIO'
      '       ,TRANSACAO_CONTABIL.USUARIO_CADASTRO'
      '       ,TRANSACAO_CONTABIL.USUARIO_AUTERACAO'
      '       ,TRANSACAO_CONTABIL.USUARIO_EXCLUSAO'
      '       ,TRANSACAO_CONTABIL.DATA_CADASTRO'
      '       ,TRANSACAO_CONTABIL.DATA_EXCLUSAO'
      '       ,TRANSACAO_CONTABIL.DATA_AUTERACAO'
      '       ,TRANSACAO_CONTABIL.EXCLUIDO'
      '       ,TRANSACAO_CONTABIL.USUARIO_RECUPERACAO'
      '       ,TRANSACAO_CONTABIL.DATA_RECUPERACAO'
      '       ,TRANSACAO_CONTABIL.TRANS_VALOR'
      '       ,TRANSACAO_CONTABIL.TRANS_HISTORICO1'
      '       ,TRANSACAO_CONTABIL.TRANS_HISTORICO2'
      '       ,TRANSACAO_CONTABIL.TRANS_DATA'
      '       ,CENTROCUSTOCONTABIL.CCC_DESCRICAO'
      '       ,CONTA_CONTABIL.CCON_DESCRICAO'
      '  FROM  TRANSACAO_CONTABIL'
      '       ,CONTA_CONTABIL'
      '       ,CENTROCUSTOCONTABIL'
      
        '  WHERE TRANSACAO_CONTABIL.CCON_CODIGO = CONTA_CONTABIL.CCON_COD' +
        'IGO'
      
        '    AND TRANSACAO_CONTABIL.CCC_CODIGO  = CENTROCUSTOCONTABIL.CCC' +
        '_CODIGO'
      '    AND TRANSACAO_CONTABIL.LOTE_CODIGO = :LOTE_CODIGO'
      '')
    Left = 408
    Top = 8
    ParamData = <
      item
        DataType = ftInteger
        Name = 'LOTE_CODIGO'
        ParamType = ptUnknown
        Value = 1
      end>
    object QTransacaoTRANS_CODIGO: TIntegerField
      FieldName = 'TRANS_CODIGO'
      Origin = 'BASE.TRANSACAO_CONTABIL.TRANS_CODIGO'
    end
    object QTransacaoLOTE_CODIGO: TIntegerField
      FieldName = 'LOTE_CODIGO'
      Origin = 'BASE.TRANSACAO_CONTABIL.LOTE_CODIGO'
    end
    object QTransacaoTRANS_SITUACAO: TStringField
      FieldName = 'TRANS_SITUACAO'
      Origin = 'BASE.TRANSACAO_CONTABIL.TRANS_SITUACAO'
      FixedChar = True
      Size = 1
    end
    object QTransacaoTRANS_DEB_CRE: TStringField
      FieldName = 'TRANS_DEB_CRE'
      Origin = 'BASE.TRANSACAO_CONTABIL.TRANS_DEB_CRE'
      FixedChar = True
      Size = 1
    end
    object QTransacaoCCON_CODIGO: TIntegerField
      FieldName = 'CCON_CODIGO'
      Origin = 'BASE.TRANSACAO_CONTABIL.CCON_CODIGO'
    end
    object QTransacaoCCC_CODIGO: TIntegerField
      FieldName = 'CCC_CODIGO'
      Origin = 'BASE.TRANSACAO_CONTABIL.CCC_CODIGO'
    end
    object QTransacaoDATAMODIFICACAO: TDateTimeField
      FieldName = 'DATAMODIFICACAO'
      Origin = 'BASE.TRANSACAO_CONTABIL.DATAMODIFICACAO'
    end
    object QTransacaoUSUARIO: TStringField
      FieldName = 'USUARIO'
      Origin = 'BASE.TRANSACAO_CONTABIL.USUARIO'
      Size = 10
    end
    object QTransacaoUSUARIO_CADASTRO: TStringField
      FieldName = 'USUARIO_CADASTRO'
      Origin = 'BASE.TRANSACAO_CONTABIL.USUARIO_CADASTRO'
    end
    object QTransacaoUSUARIO_AUTERACAO: TStringField
      FieldName = 'USUARIO_AUTERACAO'
      Origin = 'BASE.TRANSACAO_CONTABIL.USUARIO_AUTERACAO'
    end
    object QTransacaoUSUARIO_EXCLUSAO: TStringField
      FieldName = 'USUARIO_EXCLUSAO'
      Origin = 'BASE.TRANSACAO_CONTABIL.USUARIO_EXCLUSAO'
    end
    object QTransacaoDATA_CADASTRO: TDateTimeField
      FieldName = 'DATA_CADASTRO'
      Origin = 'BASE.TRANSACAO_CONTABIL.DATA_CADASTRO'
    end
    object QTransacaoDATA_EXCLUSAO: TDateTimeField
      FieldName = 'DATA_EXCLUSAO'
      Origin = 'BASE.TRANSACAO_CONTABIL.DATA_EXCLUSAO'
    end
    object QTransacaoDATA_AUTERACAO: TDateTimeField
      FieldName = 'DATA_AUTERACAO'
      Origin = 'BASE.TRANSACAO_CONTABIL.DATA_AUTERACAO'
    end
    object QTransacaoEXCLUIDO: TStringField
      FieldName = 'EXCLUIDO'
      Origin = 'BASE.TRANSACAO_CONTABIL.EXCLUIDO'
      FixedChar = True
      Size = 1
    end
    object QTransacaoUSUARIO_RECUPERACAO: TStringField
      FieldName = 'USUARIO_RECUPERACAO'
      Origin = 'BASE.TRANSACAO_CONTABIL.USUARIO_RECUPERACAO'
    end
    object QTransacaoDATA_RECUPERACAO: TDateTimeField
      FieldName = 'DATA_RECUPERACAO'
      Origin = 'BASE.TRANSACAO_CONTABIL.DATA_RECUPERACAO'
    end
    object QTransacaoTRANS_VALOR: TFloatField
      FieldName = 'TRANS_VALOR'
      Origin = 'BASE.TRANSACAO_CONTABIL.TRANS_VALOR'
    end
    object QTransacaoTRANS_HISTORICO1: TStringField
      FieldName = 'TRANS_HISTORICO1'
      Origin = 'BASE.TRANSACAO_CONTABIL.TRANS_HISTORICO1'
      Size = 60
    end
    object QTransacaoTRANS_HISTORICO2: TStringField
      FieldName = 'TRANS_HISTORICO2'
      Origin = 'BASE.TRANSACAO_CONTABIL.TRANS_HISTORICO2'
      Size = 60
    end
    object QTransacaoCCC_DESCRICAO: TStringField
      FieldName = 'CCC_DESCRICAO'
      Origin = 'BASE.CENTROCUSTOCONTABIL.CCC_DESCRICAO'
      ProviderFlags = []
      Size = 60
    end
    object QTransacaoCCON_DESCRICAO: TStringField
      FieldName = 'CCON_DESCRICAO'
      Origin = 'BASE.CONTA_CONTABIL.CCON_DESCRICAO'
      ProviderFlags = []
      Size = 40
    end
    object QTransacaoTRANS_DATA: TDateTimeField
      FieldName = 'TRANS_DATA'
    end
  end
  object QTransItem: TQuery
    DatabaseName = 'base'
    SQL.Strings = (
      'SELECT ITEM_TRANSACAO_CONTABIL.TRANS_CODIGO'
      '      ,ITEM_TRANSACAO_CONTABIL.TRANS_SITUACAO'
      '      ,ITEM_TRANSACAO_CONTABIL.TRANS_DEB_CRE'
      '      ,ITEM_TRANSACAO_CONTABIL.CCON_CODIGO'
      '      ,ITEM_TRANSACAO_CONTABIL.CCC_CODIGO'
      '      ,ITEM_TRANSACAO_CONTABIL.ITEM_TRANS_CODIGO'
      '      ,ITEM_TRANSACAO_CONTABIL.DATAMODIFICACAO'
      '      ,ITEM_TRANSACAO_CONTABIL.USUARIO'
      '      ,ITEM_TRANSACAO_CONTABIL.USUARIO_CADASTRO'
      '      ,ITEM_TRANSACAO_CONTABIL.USUARIO_AUTERACAO'
      '      ,ITEM_TRANSACAO_CONTABIL.USUARIO_EXCLUSAO'
      '      ,ITEM_TRANSACAO_CONTABIL.DATA_CADASTRO'
      '      ,ITEM_TRANSACAO_CONTABIL.DATA_EXCLUSAO'
      '      ,ITEM_TRANSACAO_CONTABIL.DATA_AUTERACAO'
      '      ,ITEM_TRANSACAO_CONTABIL.EXCLUIDO'
      '      ,ITEM_TRANSACAO_CONTABIL.USUARIO_RECUPERACAO'
      '      ,ITEM_TRANSACAO_CONTABIL.DATA_RECUPERACAO'
      '      ,ITEM_TRANSACAO_CONTABIL.TRANS_VALOR'
      '      ,ITEM_TRANSACAO_CONTABIL.TRANS_HISTORICO1'
      '      ,ITEM_TRANSACAO_CONTABIL.TRANS_HISTORICO2'
      '      ,ITEM_TRANSACAO_CONTABIL.TRANS_DATA'
      '      ,CENTROCUSTOCONTABIL.CCC_DESCRICAO'
      '      ,CONTA_CONTABIL.CCON_DESCRICAO'
      '  FROM ITEM_TRANSACAO_CONTABIL'
      '      ,CONTA_CONTABIL'
      '      ,CENTROCUSTOCONTABIL'
      
        ' WHERE ITEM_TRANSACAO_CONTABIL.CCON_CODIGO = CONTA_CONTABIL.CCON' +
        '_CODIGO'
      
        '   AND ITEM_TRANSACAO_CONTABIL.CCC_CODIGO  = CENTROCUSTOCONTABIL' +
        '.CCC_CODIGO'
      '   AND ITEM_TRANSACAO_CONTABIL.TRANS_CODIGO = :TRANS_CODIGO')
    Left = 440
    Top = 8
    ParamData = <
      item
        DataType = ftInteger
        Name = 'TRANS_CODIGO'
        ParamType = ptUnknown
      end>
    object QTransItemTRANS_CODIGO: TIntegerField
      FieldName = 'TRANS_CODIGO'
      Origin = 'BASE.ITEM_TRANSACAO_CONTABIL.TRANS_CODIGO'
    end
    object QTransItemTRANS_SITUACAO: TStringField
      FieldName = 'TRANS_SITUACAO'
      Origin = 'BASE.ITEM_TRANSACAO_CONTABIL.TRANS_SITUACAO'
      FixedChar = True
      Size = 1
    end
    object QTransItemTRANS_DEB_CRE: TStringField
      FieldName = 'TRANS_DEB_CRE'
      Origin = 'BASE.ITEM_TRANSACAO_CONTABIL.TRANS_DEB_CRE'
      FixedChar = True
      Size = 1
    end
    object QTransItemCCON_CODIGO: TIntegerField
      FieldName = 'CCON_CODIGO'
      Origin = 'BASE.ITEM_TRANSACAO_CONTABIL.CCON_CODIGO'
    end
    object QTransItemCCC_CODIGO: TIntegerField
      FieldName = 'CCC_CODIGO'
      Origin = 'BASE.ITEM_TRANSACAO_CONTABIL.CCC_CODIGO'
    end
    object QTransItemITEM_TRANS_CODIGO: TIntegerField
      FieldName = 'ITEM_TRANS_CODIGO'
      Origin = 'BASE.ITEM_TRANSACAO_CONTABIL.ITEM_TRANS_CODIGO'
    end
    object QTransItemDATAMODIFICACAO: TDateTimeField
      FieldName = 'DATAMODIFICACAO'
      Origin = 'BASE.ITEM_TRANSACAO_CONTABIL.DATAMODIFICACAO'
    end
    object QTransItemUSUARIO: TStringField
      FieldName = 'USUARIO'
      Origin = 'BASE.ITEM_TRANSACAO_CONTABIL.USUARIO'
      Size = 10
    end
    object QTransItemUSUARIO_CADASTRO: TStringField
      FieldName = 'USUARIO_CADASTRO'
      Origin = 'BASE.ITEM_TRANSACAO_CONTABIL.USUARIO_CADASTRO'
    end
    object QTransItemUSUARIO_AUTERACAO: TStringField
      FieldName = 'USUARIO_AUTERACAO'
      Origin = 'BASE.ITEM_TRANSACAO_CONTABIL.USUARIO_AUTERACAO'
    end
    object QTransItemUSUARIO_EXCLUSAO: TStringField
      FieldName = 'USUARIO_EXCLUSAO'
      Origin = 'BASE.ITEM_TRANSACAO_CONTABIL.USUARIO_EXCLUSAO'
    end
    object QTransItemDATA_CADASTRO: TDateTimeField
      FieldName = 'DATA_CADASTRO'
      Origin = 'BASE.ITEM_TRANSACAO_CONTABIL.DATA_CADASTRO'
    end
    object QTransItemDATA_EXCLUSAO: TDateTimeField
      FieldName = 'DATA_EXCLUSAO'
      Origin = 'BASE.ITEM_TRANSACAO_CONTABIL.DATA_EXCLUSAO'
    end
    object QTransItemDATA_AUTERACAO: TDateTimeField
      FieldName = 'DATA_AUTERACAO'
      Origin = 'BASE.ITEM_TRANSACAO_CONTABIL.DATA_AUTERACAO'
    end
    object QTransItemEXCLUIDO: TStringField
      FieldName = 'EXCLUIDO'
      Origin = 'BASE.ITEM_TRANSACAO_CONTABIL.EXCLUIDO'
      FixedChar = True
      Size = 1
    end
    object QTransItemUSUARIO_RECUPERACAO: TStringField
      FieldName = 'USUARIO_RECUPERACAO'
      Origin = 'BASE.ITEM_TRANSACAO_CONTABIL.USUARIO_RECUPERACAO'
    end
    object QTransItemDATA_RECUPERACAO: TDateTimeField
      FieldName = 'DATA_RECUPERACAO'
      Origin = 'BASE.ITEM_TRANSACAO_CONTABIL.DATA_RECUPERACAO'
    end
    object QTransItemTRANS_VALOR: TFloatField
      FieldName = 'TRANS_VALOR'
      Origin = 'BASE.ITEM_TRANSACAO_CONTABIL.TRANS_VALOR'
    end
    object QTransItemTRANS_HISTORICO1: TStringField
      FieldName = 'TRANS_HISTORICO1'
      Origin = 'BASE.ITEM_TRANSACAO_CONTABIL.TRANS_HISTORICO1'
      Size = 60
    end
    object QTransItemTRANS_HISTORICO2: TStringField
      FieldName = 'TRANS_HISTORICO2'
      Origin = 'BASE.ITEM_TRANSACAO_CONTABIL.TRANS_HISTORICO2'
      Size = 60
    end
    object QTransItemCCC_DESCRICAO: TStringField
      FieldName = 'CCC_DESCRICAO'
      Origin = 'BASE.CENTROCUSTOCONTABIL.CCC_DESCRICAO'
      ProviderFlags = []
      Size = 60
    end
    object QTransItemCCON_DESCRICAO: TStringField
      FieldName = 'CCON_DESCRICAO'
      Origin = 'BASE.CONTA_CONTABIL.CCON_DESCRICAO'
      ProviderFlags = []
      Size = 40
    end
    object QTransItemTRANS_DATA: TDateTimeField
      FieldName = 'TRANS_DATA'
    end
  end
  object cdsTransacao: TClientDataSet
    Aggregates = <>
    IndexFieldNames = 'LOTE_CODIGO'
    MasterFields = 'LOTE_CODIGO'
    MasterSource = dsCadastro
    PacketRecords = 0
    Params = <>
    ProviderName = 'dspTransacao'
    Left = 409
    Top = 72
    object cdsTransacaoTRANS_CODIGO: TIntegerField
      FieldName = 'TRANS_CODIGO'
    end
    object cdsTransacaoLOTE_CODIGO: TIntegerField
      FieldName = 'LOTE_CODIGO'
    end
    object cdsTransacaoTRANS_SITUACAO: TStringField
      FieldName = 'TRANS_SITUACAO'
      FixedChar = True
      Size = 1
    end
    object cdsTransacaoTRANS_DEB_CRE: TStringField
      FieldName = 'TRANS_DEB_CRE'
      FixedChar = True
      Size = 1
    end
    object cdsTransacaoCCON_CODIGO: TIntegerField
      FieldName = 'CCON_CODIGO'
    end
    object cdsTransacaoCCC_CODIGO: TIntegerField
      FieldName = 'CCC_CODIGO'
    end
    object cdsTransacaoDATAMODIFICACAO: TDateTimeField
      FieldName = 'DATAMODIFICACAO'
    end
    object cdsTransacaoUSUARIO: TStringField
      FieldName = 'USUARIO'
      Size = 10
    end
    object cdsTransacaoUSUARIO_CADASTRO: TStringField
      FieldName = 'USUARIO_CADASTRO'
    end
    object cdsTransacaoUSUARIO_AUTERACAO: TStringField
      FieldName = 'USUARIO_AUTERACAO'
    end
    object cdsTransacaoUSUARIO_EXCLUSAO: TStringField
      FieldName = 'USUARIO_EXCLUSAO'
    end
    object cdsTransacaoDATA_CADASTRO: TDateTimeField
      FieldName = 'DATA_CADASTRO'
    end
    object cdsTransacaoDATA_EXCLUSAO: TDateTimeField
      FieldName = 'DATA_EXCLUSAO'
    end
    object cdsTransacaoDATA_AUTERACAO: TDateTimeField
      FieldName = 'DATA_AUTERACAO'
    end
    object cdsTransacaoEXCLUIDO: TStringField
      FieldName = 'EXCLUIDO'
      FixedChar = True
      Size = 1
    end
    object cdsTransacaoUSUARIO_RECUPERACAO: TStringField
      FieldName = 'USUARIO_RECUPERACAO'
    end
    object cdsTransacaoDATA_RECUPERACAO: TDateTimeField
      FieldName = 'DATA_RECUPERACAO'
    end
    object cdsTransacaoTRANS_VALOR: TFloatField
      FieldName = 'TRANS_VALOR'
      DisplayFormat = '#,##0.00'
    end
    object cdsTransacaoTRANS_HISTORICO1: TStringField
      FieldName = 'TRANS_HISTORICO1'
      Size = 60
    end
    object cdsTransacaoTRANS_HISTORICO2: TStringField
      FieldName = 'TRANS_HISTORICO2'
      Size = 60
    end
    object cdsTransacaoCCC_DESCRICAO: TStringField
      FieldName = 'CCC_DESCRICAO'
      ProviderFlags = []
      Size = 60
    end
    object cdsTransacaoCCON_DESCRICAO: TStringField
      FieldName = 'CCON_DESCRICAO'
      ProviderFlags = []
      Size = 40
    end
    object cdsTransacaoTRANS_DATA: TDateTimeField
      FieldName = 'TRANS_DATA'
    end
  end
  object cdsTransItem: TClientDataSet
    Aggregates = <>
    IndexFieldNames = 'TRANS_CODIGO'
    MasterFields = 'TRANS_CODIGO'
    MasterSource = dsTransacao
    PacketRecords = 0
    Params = <>
    ProviderName = 'dspTransItem'
    Left = 441
    Top = 72
    object cdsTransItemTRANS_CODIGO: TIntegerField
      FieldName = 'TRANS_CODIGO'
    end
    object cdsTransItemTRANS_SITUACAO: TStringField
      FieldName = 'TRANS_SITUACAO'
      FixedChar = True
      Size = 1
    end
    object cdsTransItemTRANS_DEB_CRE: TStringField
      FieldName = 'TRANS_DEB_CRE'
      FixedChar = True
      Size = 1
    end
    object cdsTransItemCCON_CODIGO: TIntegerField
      FieldName = 'CCON_CODIGO'
    end
    object cdsTransItemCCC_CODIGO: TIntegerField
      FieldName = 'CCC_CODIGO'
    end
    object cdsTransItemITEM_TRANS_CODIGO: TIntegerField
      FieldName = 'ITEM_TRANS_CODIGO'
    end
    object cdsTransItemDATAMODIFICACAO: TDateTimeField
      FieldName = 'DATAMODIFICACAO'
    end
    object cdsTransItemUSUARIO: TStringField
      FieldName = 'USUARIO'
      Size = 10
    end
    object cdsTransItemUSUARIO_CADASTRO: TStringField
      FieldName = 'USUARIO_CADASTRO'
    end
    object cdsTransItemUSUARIO_AUTERACAO: TStringField
      FieldName = 'USUARIO_AUTERACAO'
    end
    object cdsTransItemUSUARIO_EXCLUSAO: TStringField
      FieldName = 'USUARIO_EXCLUSAO'
    end
    object cdsTransItemDATA_CADASTRO: TDateTimeField
      FieldName = 'DATA_CADASTRO'
    end
    object cdsTransItemDATA_EXCLUSAO: TDateTimeField
      FieldName = 'DATA_EXCLUSAO'
    end
    object cdsTransItemDATA_AUTERACAO: TDateTimeField
      FieldName = 'DATA_AUTERACAO'
    end
    object cdsTransItemEXCLUIDO: TStringField
      FieldName = 'EXCLUIDO'
      FixedChar = True
      Size = 1
    end
    object cdsTransItemUSUARIO_RECUPERACAO: TStringField
      FieldName = 'USUARIO_RECUPERACAO'
    end
    object cdsTransItemDATA_RECUPERACAO: TDateTimeField
      FieldName = 'DATA_RECUPERACAO'
    end
    object cdsTransItemTRANS_VALOR: TFloatField
      FieldName = 'TRANS_VALOR'
      DisplayFormat = '#,##0.00'
    end
    object cdsTransItemTRANS_HISTORICO1: TStringField
      FieldName = 'TRANS_HISTORICO1'
      Size = 60
    end
    object cdsTransItemTRANS_HISTORICO2: TStringField
      FieldName = 'TRANS_HISTORICO2'
      Size = 60
    end
    object cdsTransItemCCC_DESCRICAO: TStringField
      FieldName = 'CCC_DESCRICAO'
      ProviderFlags = []
      Size = 60
    end
    object cdsTransItemCCON_DESCRICAO: TStringField
      FieldName = 'CCON_DESCRICAO'
      ProviderFlags = []
      Size = 40
    end
    object cdsTransItemTRANS_DATA: TDateTimeField
      FieldName = 'TRANS_DATA'
    end
  end
  object DataSetProvider1: TDataSetProvider
    Left = 409
    Top = 40
  end
  object dspTransacao: TDataSetProvider
    DataSet = QTransacao
    Left = 409
    Top = 40
  end
  object dspTransItem: TDataSetProvider
    DataSet = QTransItem
    Left = 441
    Top = 40
  end
  object dsTransacao: TDataSource
    DataSet = cdsTransacao
    OnStateChange = dsTransacaoStateChange
    OnDataChange = dsTransacaoDataChange
    Left = 409
    Top = 106
  end
  object dsTransItem: TDataSource
    DataSet = cdsTransItem
    OnStateChange = dsTransItemStateChange
    OnDataChange = dsTransItemDataChange
    Left = 441
    Top = 106
  end
  object dsContaContabil: TDataSource
    DataSet = DMContabilidade.cdsContaContabil
    OnDataChange = dsContaContabilDataChange
    Left = 349
    Top = 323
  end
  object dsCentroCustoContabil: TDataSource
    DataSet = DMContabilidade.cdsCentroCustoContabil
    Left = 717
    Top = 323
  end
end
